<!--#include file="lib/utf-8.asp"-->
<!--#include file="lib/conn.asp"-->
<!--#include file="lib/saferequest.asp"-->
<!DOCTYPE html>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="pragma" content="no-cache" />
<meta http-equiv="cache-control" content="no-cache" />
<meta http-equiv="Expires" content="-1" />
</head>
<body>
<h3>公告和更新记录</h3>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT *  FROM updatelog order by updatelog_date desc,updatelog_post asc,updatelog_id desc"
rs.Open sql,conn,1,1
str=""
t_date=""
do while not rs.eof
	select case rs("updatelog_post")
		case 0 post="用户权限"
		case 1 post="船务岗位"
		case 2 post="车队岗位"
		case 3 post="商务岗位"
		case 4 post="财务岗位"
	end select
	if rs("updatelog_date")<>t_date then 
		t_post=-1
		if t_date<>"" then str=str&"</ul></div>"
		str=str&"<div><h4>"&rs("updatelog_date")&"</h4><ul>"
		t_date=rs("updatelog_date")
	end if
	if rs("updatelog_post")<>t_post then
		if t_post<>-1 then str=str&"</ol></li>"
		str=str&"<li>"&post&"<ol>"
		t_post=rs("updatelog_post")
	end if
	str=str&"<li>"&rs("updatelog_memo")&"</li>"
	rs.movenext
loop
str=str&"</ol></li></ul></div>"
response.write(str)
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

</body>
</html>
